* syntax.c (scan_lists, Fforward_comment): Call scan_sexps_forward

	with the proper number of arguments.

diff --git a/src/syntax.c b/src/syntax.c
index db60b8f09f50991c64da0531febd850eeb68ac90..4386ea2db0c97b752c390be11a0e94cb77726514 100644 (file)
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -804,7 +804,7 @@ between them, return t; otherwise return nil.")
                       last passed a comment starter.  */
                    struct lisp_parse_state state;
                    scan_sexps_forward (&state, find_defun_start (comment_end),
-                                       comment_end - 1, -10000, 0, Qnil);
+                                       comment_end - 1, -10000, 0, Qnil, 1);
                    if (state.incomment)
                      from = state.comstart;
                    else
@@ -1191,7 +1191,7 @@ scan_lists (from, count, depth, sexpflag)
                       last passed a comment starter.  */
                    struct lisp_parse_state state;
                    scan_sexps_forward (&state, find_defun_start (comment_end),
-                                       comment_end - 1, -10000, 0, Qnil);
+                                       comment_end - 1, -10000, 0, Qnil, 1);
                    if (state.incomment)
                      from = state.comstart;
                    else